/ Apple CD-ROM Titles Sampler / Apple CD-ROM Titles Sampler.iso / Demos / tuba / tuba.rsrc / STXT_1057

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 0c 00 00 07 9b | 00 00 00 3e 2d 2d 0d 6d |........|...>--.m|
|00000010| 61 63 72 6f 20 69 6e 69 | 74 0d 20 20 20 20 73 65 |acro ini|t.    se|
|00000020| 74 5f 73 6f 75 6e 64 5f | 70 6f 69 6e 74 65 72 20 |t_sound_|pointer |
|00000030| 28 22 31 38 2c 31 36 22 | 29 0d 20 20 20 20 73 65 |("18,16"|).    se|
|00000040| 74 20 74 68 65 20 65 78 | 69 74 6c 6f 63 6b 20 3d |t the ex|itlock =|
|00000050| 20 74 72 75 65 0d 20 20 | 20 20 69 6e 69 74 5f 66 | true.  |  init_f|
|00000060| 69 65 6c 64 73 0d 20 20 | 20 20 2d 2d 70 75 74 20 |ields.  |  --put |
|00000070| 22 74 22 20 69 6e 74 6f | 20 66 69 65 6c 64 20 22 |"t" into| field "|
|00000080| 6c 65 74 74 65 72 22 0d | 20 20 20 20 67 6c 6f 62 |letter".|    glob|
|00000090| 61 6c 20 6e 75 6d 5f 6c | 65 66 74 0d 20 20 20 20 |al num_l|eft.    |
|000000a0| 67 6c 6f 62 61 6c 20 77 | 6f 72 64 5f 6f 6e 20 2d |global w|ord_on -|
|000000b0| 2d 20 63 75 72 72 65 6e | 74 20 77 6f 72 64 20 74 |- curren|t word t|
|000000c0| 6f 20 73 70 65 61 6b 0d | 20 20 20 20 67 6c 6f 62 |o speak.|    glob|
|000000d0| 61 6c 20 61 63 74 75 61 | 6c 5f 77 6f 72 64 20 2d |al actua|l_word -|
|000000e0| 2d 20 6e 61 6d 65 20 6f | 66 20 70 69 63 74 75 72 |- name o|f pictur|
|000000f0| 65 73 20 69 6e 20 73 63 | 65 6e 65 3b 20 63 72 65 |es in sc|ene; cre|
|00000100| 61 74 65 64 20 69 6e 20 | 63 72 65 61 74 65 5f 61 |ated in |create_a|
|00000110| 72 72 61 79 0d 20 20 20 | 20 67 6c 6f 62 61 6c 20 |rray.   | global |
|00000120| 61 63 63 6f 6d 70 61 6e | 69 6e 67 5f 73 6f 75 6e |accompan|ing_soun|
|00000130| 64 20 2d 2d 20 73 6f 75 | 6e 64 20 74 6f 20 67 6f |d -- sou|nd to go|
|00000140| 20 77 69 74 68 20 70 69 | 63 74 75 72 65 0d 20 20 | with pi|cture.  |
|00000150| 20 20 73 65 74 20 74 68 | 65 20 70 75 70 70 65 74 |  set th|e puppet|
|00000160| 20 6f 66 20 73 70 72 69 | 74 65 20 31 38 20 74 6f | of spri|te 18 to|
|00000170| 20 66 61 6c 73 65 20 20 | 2d 2d 20 6a 75 73 74 20 | false  |-- just |
|00000180| 69 6e 20 63 61 73 65 0d | 20 20 20 20 73 65 74 20 |in case.|    set |
|00000190| 74 68 65 20 70 75 70 70 | 65 74 20 6f 66 20 73 70 |the pupp|et of sp|
|000001a0| 72 69 74 65 20 32 31 20 | 74 6f 20 66 61 6c 73 65 |rite 21 |to false|
|000001b0| 0d 20 20 20 20 73 65 74 | 20 77 6f 72 64 5f 6f 6e |.    set| word_on|
|000001c0| 20 3d 20 31 35 20 2d 2d | 20 77 66 6c 0d 20 20 20 | = 15 --| wfl.   |
|000001d0| 20 63 72 65 61 74 65 5f | 61 72 72 61 79 20 31 35 | create_|array 15|
|000001e0| 20 20 2d 2d 20 66 69 72 | 73 74 20 3c 3d 39 20 63 |  -- fir|st <=9 c|
|000001f0| 65 6c 6c 73 20 66 6f 72 | 20 77 6f 72 64 73 20 6f |ells for| words o|
|00000200| 72 20 66 6c 61 67 73 20 | 69 6e 64 69 63 61 74 69 |r flags |indicati|
|00000210| 6e 67 20 63 6c 69 63 6b | 65 64 20 6f 6e 3b 0d 20 |ng click|ed on;. |
|00000220| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000230| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 2d 2d |        |      --|
|00000240| 20 23 31 35 20 66 6f 72 | 20 77 66 6c 0d 20 20 20 | #15 for| wfl.   |
|00000250| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000260| 20 20 20 20 20 20 20 20 | 20 20 20 20 2d 2d 20 23 |        |    -- #|
|00000270| 31 31 20 66 6f 72 20 6c | 61 73 74 20 70 61 72 74 |11 for l|ast part|
|00000280| 20 6f 66 20 77 6f 72 64 | 0d 20 20 20 20 20 20 20 | of word|.       |
|00000290| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000002a0| 20 20 20 20 20 20 20 20 | 2d 2d 20 23 31 32 2d 31 |        |-- #12-1|
|000002b0| 33 20 66 6f 72 20 77 31 | 2f 77 32 0d 20 20 20 20 |3 for w1|/w2.    |
|000002c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000002d0| 20 20 20 20 20 20 20 20 | 20 20 20 2d 2d 20 23 31 |        |   -- #1|
|000002e0| 34 20 66 6f 72 20 63 6f | 72 72 65 63 74 20 6c 65 |4 for co|rrect le|
|000002f0| 74 74 65 72 20 73 6f 75 | 6e 64 20 20 20 20 0d 20 |tter sou|nd    . |
|00000300| 20 20 20 73 65 74 20 6e | 75 6d 5f 6c 65 66 74 20 |   set n|um_left |
|00000310| 3d 20 38 20 20 2d 2d 20 | 73 74 61 72 74 69 6e 67 |= 8  -- |starting|
|00000320| 20 61 74 20 74 6f 74 61 | 6c 20 6e 75 6d 62 65 72 | at tota|l number|
|00000330| 20 77 6f 72 64 73 0d 20 | 20 20 20 61 63 74 75 61 | words. |   actua|
|00000340| 6c 5f 77 6f 72 64 20 28 | 6d 70 75 74 2c 20 31 2c |l_word (|mput, 1,|
|00000350| 22 31 38 2c 30 36 20 74 | 75 62 61 22 29 20 2d 2d |"18,06 t|uba") --|
|00000360| 20 74 75 62 61 0d 20 20 | 20 20 61 63 74 75 61 6c | tuba.  |  actual|
|00000370| 5f 77 6f 72 64 20 28 6d | 70 75 74 2c 20 32 2c 22 |_word (m|put, 2,"|
|00000380| 31 38 2c 30 37 20 74 75 | 72 74 6c 65 22 29 20 2d |18,07 tu|rtle") -|
|00000390| 2d 20 74 75 72 74 6c 65 | 0d 20 20 20 20 20 61 63 |- turtle|.     ac|
|000003a0| 74 75 61 6c 5f 77 6f 72 | 64 20 28 6d 70 75 74 2c |tual_wor|d (mput,|
|000003b0| 20 33 2c 22 31 38 2c 30 | 34 20 74 6f 6d 61 74 6f | 3,"18,0|4 tomato|
|000003c0| 22 29 20 2d 2d 20 74 6f | 6d 61 74 6f 0d 20 20 20 |") -- to|mato.   |
|000003d0| 20 61 63 74 75 61 6c 5f | 77 6f 72 64 20 28 6d 70 | actual_|word (mp|
|000003e0| 75 74 2c 20 34 2c 22 31 | 38 2c 30 33 20 74 69 67 |ut, 4,"1|8,03 tig|
|000003f0| 65 72 22 29 20 2d 2d 20 | 74 69 67 65 72 0d 20 20 |er") -- |tiger.  |
|00000400| 20 20 61 63 74 75 61 6c | 5f 77 6f 72 64 20 28 6d |  actual|_word (m|
|00000410| 70 75 74 2c 20 35 2c 22 | 31 38 2c 31 32 20 74 65 |put, 5,"|18,12 te|
|00000420| 64 64 79 22 29 20 2d 2d | 20 74 65 64 64 79 0d 20 |ddy") --| teddy. |
|00000430| 20 20 20 61 63 74 75 61 | 6c 5f 77 6f 72 64 20 28 |   actua|l_word (|
|00000440| 6d 70 75 74 2c 20 36 2c | 22 31 38 2c 30 32 20 74 |mput, 6,|"18,02 t|
|00000450| 61 78 69 22 29 20 2d 2d | 20 74 61 78 69 0d 20 20 |axi") --| taxi.  |
|00000460| 20 20 61 63 74 75 61 6c | 5f 77 6f 72 64 20 28 6d |  actual|_word (m|
|00000470| 70 75 74 2c 20 37 2c 22 | 31 38 2c 31 31 20 74 61 |put, 7,"|18,11 ta|
|00000480| 62 6c 65 22 29 20 2d 2d | 20 74 61 62 6c 65 0d 20 |ble") --| table. |
|00000490| 20 20 20 61 63 74 75 61 | 6c 5f 77 6f 72 64 20 28 |   actua|l_word (|
|000004a0| 6d 70 75 74 2c 20 38 2c | 22 31 38 2c 30 35 20 74 |mput, 8,|"18,05 t|
|000004b0| 6f 79 22 29 20 2d 2d 20 | 74 6f 79 0d 2d 2d 2d 2d |oy") -- |toy.----|
|000004c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 20 20 |--------|-----.  |
|000004d0| 20 20 61 63 74 75 61 6c | 5f 77 6f 72 64 20 28 6d |  actual|_word (m|
|000004e0| 70 75 74 2c 20 31 31 2c | 22 31 38 2c 30 38 20 77 |put, 11,|"18,08 w|
|000004f0| 69 74 68 20 54 22 29 20 | 2d 2d 20 77 69 74 68 20 |ith T") |-- with |
|00000500| 54 0d 20 20 20 20 20 20 | 20 20 61 63 63 6f 6d 70 |T.      |  accomp|
|00000510| 61 6e 69 6e 67 5f 73 6f | 75 6e 64 20 28 6d 70 75 |aning_so|und (mpu|
|00000520| 74 2c 31 31 2c 22 31 35 | 2c 30 36 22 29 20 20 2d |t,11,"15|,06")  -|
|00000530| 2d 20 77 68 61 74 20 62 | 65 67 69 6e 73 0d 20 20 |- what b|egins.  |
|00000540| 20 20 61 63 74 75 61 6c | 5f 77 6f 72 64 20 28 6d |  actual|_word (m|
|00000550| 70 75 74 2c 20 31 32 2c | 22 31 38 2c 31 33 20 75 |put, 12,|"18,13 u|
|00000560| 62 61 22 29 20 2d 2d 20 | 75 62 61 0d 20 20 20 20 |ba") -- |uba.    |
|00000570| 20 20 20 20 61 63 63 6f | 6d 70 61 6e 69 6e 67 5f |    acco|mpaning_|
|00000580| 73 6f 75 6e 64 20 28 6d | 70 75 74 2c 31 32 2c 22 |sound (m|put,12,"|
|00000590| 31 35 2c 30 31 20 70 20 | 73 6e 64 22 29 20 20 2d |15,01 p |snd")  -|
|000005a0| 2d 20 70 20 73 6e 64 0d | 20 20 20 20 61 63 74 75 |- p snd.|    actu|
|000005b0| 61 6c 5f 77 6f 72 64 20 | 28 6d 70 75 74 2c 20 31 |al_word |(mput, 1|
|000005c0| 33 2c 22 31 38 2c 31 33 | 20 75 62 61 22 29 20 2d |3,"18,13| uba") -|
|000005d0| 2d 20 75 62 61 0d 20 20 | 20 20 20 20 20 20 61 63 |- uba.  |      ac|
|000005e0| 63 6f 6d 70 61 6e 69 6e | 67 5f 73 6f 75 6e 64 20 |companin|g_sound |
|000005f0| 28 6d 70 75 74 2c 31 33 | 2c 22 31 35 2c 30 34 20 |(mput,13|,"15,04 |
|00000600| 67 20 73 6e 64 22 29 20 | 20 2d 2d 20 67 20 73 6e |g snd") | -- g sn|
|00000610| 64 0d 20 20 20 20 61 63 | 74 75 61 6c 5f 77 6f 72 |d.    ac|tual_wor|
|00000620| 64 20 28 6d 70 75 74 2c | 20 31 34 2c 22 31 34 2c |d (mput,| 14,"14,|
|00000630| 30 34 20 74 68 61 74 73 | 20 69 74 22 29 20 20 2d |04 thats| it")  -|
|00000640| 2d 20 74 68 61 74 73 20 | 69 74 0d 20 20 20 20 20 |- thats |it.     |
|00000650| 20 20 20 61 63 63 6f 6d | 70 61 6e 69 6e 67 5f 73 |   accom|paning_s|
|00000660| 6f 75 6e 64 20 28 6d 70 | 75 74 2c 31 34 2c 22 31 |ound (mp|ut,14,"1|
|00000670| 38 2c 30 36 20 74 75 62 | 61 22 29 20 20 2d 2d 20 |8,06 tub|a")  -- |
|00000680| 74 75 62 61 0d 20 20 20 | 20 61 63 74 75 61 6c 5f |tuba.   | actual_|
|00000690| 77 6f 72 64 20 28 6d 70 | 75 74 2c 20 31 35 2c 22 |word (mp|ut, 15,"|
|000006a0| 31 38 2c 30 31 20 6f 66 | 20 74 75 62 61 22 29 20 |18,01 of| tuba") |
|000006b0| 20 2d 2d 20 6f 66 20 74 | 75 62 61 0d 20 20 20 20 | -- of t|uba.    |
|000006c0| 20 20 20 20 61 63 63 6f | 6d 70 61 6e 69 6e 67 5f |    acco|mpaning_|
|000006d0| 73 6f 75 6e 64 20 28 6d | 70 75 74 2c 31 35 2c 22 |sound (m|put,15,"|
|000006e0| 31 35 2c 30 37 20 77 68 | 61 74 20 66 69 72 73 74 |15,07 wh|at first|
|000006f0| 20 6c 65 74 74 65 72 22 | 29 20 2d 2d 20 77 68 61 | letter"|) -- wha|
|00000700| 74 20 66 69 72 73 74 20 | 6c 65 74 74 65 72 0d 0d |t first |letter..|
|00000710| 6d 61 63 72 6f 20 6c 65 | 61 76 69 6e 67 5f 6d 6f |macro le|aving_mo|
|00000720| 76 69 65 0d 20 20 20 20 | 67 6c 6f 62 61 6c 20 6f |vie.    |global o|
|00000730| 72 69 67 5f 76 6f 6c 0d | 20 20 20 20 77 68 65 6e |rig_vol.|    when|
|00000740| 20 6d 6f 75 73 65 75 70 | 20 74 68 65 6e 20 6e 6f | mouseup| then no|
|00000750| 74 68 69 6e 67 0d 20 20 | 20 20 70 75 70 70 65 74 |thing.  |  puppet|
|00000760| 73 6f 75 6e 64 20 31 36 | 2c 34 20 2d 2d 22 62 79 |sound 16|,4 --"by|
|00000770| 65 22 0d 20 20 20 20 75 | 70 64 61 74 65 73 74 61 |e".    u|pdatesta|
|00000780| 67 65 0d 20 20 20 20 2d | 2d 73 65 74 20 74 68 65 |ge.    -|-set the|
|00000790| 20 73 6f 75 6e 64 6c 65 | 76 65 6c 20 74 6f 20 6f | soundle|vel to o|
|000007a0| 72 69 67 5f 76 6f 6c 00 | 03 00 00 00 00 00 10 00 |rig_vol.|........|
|000007b0| 0c 00 01 00 00 00 00 00 | 00 00 00 00 00 00 00 03 |........|........|
|000007c0| 2b 00 10 00 0c 00 03 00 | 00 00 0c 00 00 00 00 00 |+.......|........|
|000007d0| 00 00 00 07 04 00 0d 00 | 0a 00 03 00 00 00 0a 00 |........|........|
|000007e0| 00 00 00 00 00          |                         |.....   |        |
+--------+-------------------------+-------------------------+--------+--------+